Prevod cisel

Otázka od: Jan Šimecký

23. 11. 2002 18:15

Dobry den,

mam takovy dotaz, a to jak se daji cisla typu integer prevest na setnastkove
a pak na string a naopak (v promene typu string mam sestnastkove a to chcu
prevest na normalni integer).

Predem dekuji za vasi odpoved.



   S pozdravem

                @@@@@@@
                \ ~ ~ /
               (\ @ @ /)
     -------oOOO--(_)--OOOo-------

               Jan Šimecký
           simecky@centrum.cz
         http://www.simecky.tk
        http://www.reklalink.tk

                ooO
     ----------( )--Ooo---------
                \ ( ( )
                 \_) ) /
                     (_)

---
Odchozí zpráva neobsahuje viry.
Zkontrolováno antivirovým systémem AVG (http://www.grisoft.cz).
Verze: 6.0.394 / Virová báze: 224 - datum vydání: 3.10.2002

Odpovedá: Jiri Foldyna

23. 11. 2002 17:58

i := StrToIntDef('$' + 'ABCD', -1); hexa string na integer
i := StrToInt('$' + 'ABCD'); hexa string na integer
s := IntToHex(1234, 4); integer na hexa string

vice viz help

Zdravim

Jiri Foldyna
mailto:jiri.f@avizo.cz

> mam takovy dotaz, a to jak se daji cisla typu integer prevest
> na setnastkove
> a pak na string a naopak (v promene typu string mam
> sestnastkove a to chcu
> prevest na normalni integer).

Odpovedá: tomsir1.edu@mail.cez.cz

23. 11. 2002 18:13



1/ decimalni na hexadecimalni : fce IntToHex - vraci string, zkus
ShowMessage('$'+IntToHex(16,2));

2/ hexadecimalni na decimalni: v podstate staci, kdyz prevedes
hexadecimalni zapis ze stringu na tvar $xx a potom to cislo dal pouzijes
bez onoho $ a pracujes s nim jako s decimalnim ...

 zkus toto :

var x : integer;
       s : string;
begin
 s:= '10'; //hexadecimalni vyjadreni cisla v promenne string
 s := '$' + s; //prevedeme na tvar pouzity pro hexadecimalni vyjadreni cisla

 showmessage('hexa :'+s);

 x := StrToInt(s); // -- prevod ze stringu na integer

 showmessage('decimal : '+IntToStr(x));
end;


Snad je to odpoved na tve dotazy ...

Radek







"Jan Šimecký" <jsimecky@zskuldova.cz>@clexpert.cz on 23.11.2002 09:57:46

Odpovězte prosím - delphi-l@clexpert.cz

Odesláno kým: delphi-l-owner@clexpert.cz


Komu: <delphi-l@clexpert.cz>
Kopie:
Předmět: Prevod cisel


Dobry den,

mam takovy dotaz, a to jak se daji cisla typu integer prevest na
setnastkove
a pak na string a naopak (v promene typu string mam sestnastkove a to chcu
prevest na normalni integer).

Predem dekuji za vasi odpoved.



   S pozdravem

                @@@@@@@
                \ ~ ~ /
               (\ @ @ /)
     -------oOOO--(_)--OOOo-------

               Jan Šimecký
           simecky@centrum.cz
         http://www.simecky.tk
        http://www.reklalink.tk

                ooO
     ----------( )--Ooo---------
                \ ( ( )
                 \_) ) /
                     (_)

---
Odchozí zpráva neobsahuje viry.
Zkontrolováno antivirovým systémem AVG (http://www.grisoft.cz).
Verze: 6.0.394 / Virová báze: 224 - datum vydání: 3.10.2002